home *** CD-ROM | disk | FTP | other *** search
- ' Install script for MAPIT, Copyright 1992, 1993 John B. Allison
- BACKGROUND 63 ' display cyan colored background (see color chart in docs)
- LANGUAGE ENGLISH
- BORDER 1 ' single line borders. 2 = double, 0 = no border
- TELESCOPE ON
- SHADOW ON
-
- WINOPEN 0 0 31
- " Quality Mapping Software"
- ""
- " by "
- ""
- " Allison Software"
- " 166 Shady Lane"
- " Apollo, PA 15613, USA"
- ""
- " 412-727-2198 CompuServe 72600,1200"
-
- PAUSE 300
- WINUPDATE +2 +1 30
- " Welcome to MAPIT " ' yellow text
- WINUPDATE +2 +3 27 ' turquois
- "The Detailed World Mapping/Graphics Notepad System"
-
- PAUSE 500 ' 5 second delay
- WINCLOSE
-
- WINOPEN 0 2 30
- " Welcome to MAPIT " ' yellow text
- ""
- ""
- ""
-
- WINUPDATE +14 +3 30 ' yellow
- "MAPIT is a problem solver."
- PAUSE 200
- WINUPDATE +20 +3 31 ' white
- "is a problem solver."
- WINUPDATE +14 +4 30 ' yellow
- "MAPIT is a communicator."
- PAUSE 200
- WINUPDATE +20 +4 31 ' white
- "is a communicator."
-
- WINOPEN 0 9 31
- "MAPIT will help you:"
- " "
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- WINUPDATE +2 +1 30 ' display text in yellow
- "MAPIT"
- PAUSE 200
- WINUPDATE +2 +3 30 ' display text in yellow
- " Record and Track Data."
- 'BEEP
- PAUSE 200
- WINUPDATE +11 +3 31 ' display text in white
- "and"
- WINUPDATE +21 +3 31 ' display text in white
- "Data."
- WINUPDATE +2 +5 30 ' display text in yellow
- " Visualize and Solve location-related problems."
- PAUSE 400
- WINUPDATE +14 +5 31 ' display text in white
- "and"
- WINUPDATE +24 +5 31 ' display text in white
- "location-related problems."
- WINUPDATE +2 +7 30 ' display text in yellow
- " Create and Print Professional-Quality, Customized Maps."
- PAUSE 400
- WINUPDATE +11 +7 31 ' display text in white
- "and"
- WINUPDATE +21 +7 31 ' display text in white
- "Professional-Quality, Customized Maps."
- WINUPDATE +2 +9 30 ' display text in yellow
- " Educate and Entertain your Children."
- PAUSE 300
- WINUPDATE +12 +9 31 ' display text in white
- "and"
- WINUPDATE +26 +9 31 ' display text in white
- "your Children."
-
- WINOPEN 50 21 31
- "Press [Enter] to continue."
- WINUPDATE +9 +1 27
- "Enter" ' turquois text
- WAIT +14 +1
- WINCLOSE
- WINCLOSE
- '--------------------------------------------------------------------------
- WINOPEN 0 3 31
- "Use MAPIT to:"
- " "
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- ""
- WINUPDATE +6 +1 30 ' display text in yellow
- "MAPIT"
- PAUSE 100
-
- WINUPDATE +2 +3 31
- "Insert Lines and Figures to within 100 feet, ANYWHERE IN THE WORLD."
- WINUPDATE +9, +3 30 ' Yellow
- "Lines"
- WINUPDATE +19, +3 30 ' Yellow
- "Figures"
- WINUPDATE +47 +3 27 ' Turquois
- "ANYWHERE IN THE WORLD"
- PAUSE 400
- 'WINUPDATE +2, +5 31
- '"Label with Stroked Text in 7 fonts, in any size, at any angle."
- 'WINUPDATE +13, +5 30 ' Yellow
- '"Stroked Text"
- 'PAUSE 400
- WINUPDATE +2, +5 31
- "Collect and view Global Positioning System-generated data."
- WINUPDATE +19, +5 30 ' Yellow
- "Global Positioning System"
- PAUSE 400
- WINUPDATE +2, +7 31
- "Document with Hidden Text - a screen's-worth of data behind each marker."
- WINUPDATE +16, +7 30 ' Yellow
- "Hidden Text"
- PAUSE 400
- WINUPDATE +2, +9 31
- "Measure Distances and draw Great Circles and Range Curves."
- WINUPDATE +10, +9 30 ' Yellow
- "Distances"
- WINUPDATE +29, +9 30 ' Yellow
- "Great Circles"
- WINUPDATE +47, +9 30 ' Yellow
- "Range Curves"
- PAUSE 300
- WINUPDATE +2, +11 31
- "Plot detailed maps with HP-GL/2 on your laser printer or pen plotter."
- WINUPDATE +26 +11 30 ' Yellow
- "HP-GL/2"
- PAUSE 500
- WINUPDATE +2, +13 31
- "Export colorful .PCX screen dumps to your paint brush program."
- WINUPDATE +18, +13 30 ' Yellow
- ".PCX"
- WINUPDATE +9 +13 27 ' Turquois
- "colorful"
- PAUSE 400
- WINUPDATE +2, +15 31
- "Add customized Maps to word processing documents."
- WINUPDATE +17, +15 30 ' Yellow
- "Maps"
- PAUSE 400
-
- WINOPEN 50 21 31
- "Press [Enter] to continue."
- WINUPDATE +9 +1 27
- "Enter" ' turquois text
- WAIT +14 +1
- WINCLOSE
- WINCLOSE
- '--------------------------------------------------------------------------
- WINOPEN 0 10 31
- "MAPIT's database contains:"
- " "
- ""
- ""
- ""
- ""
- ""
- ""
- WINUPDATE +2 +1 30 ' display text in yellow
- "MAPIT"
-
- PAUSE 100
- WINUPDATE +2 +2 31 ' White text
- " 6,000 international cities"
- PAUSE 200
- WINUPDATE +2 +3 31 ' White text
- " 19,000 US cities with 1990 populations"
- PAUSE 200
- WINUPDATE +2 +4 31 ' White text
- " 5,000,000 data points organized by"
- PAUSE 200
- WINUPDATE +39 +4 30 ' Yellow text
- "coastlines,"
- PAUSE 100
- WINUPDATE +2 +5 30 ' Yellow text
- " lakes,"
- PAUSE 100
- WINUPDATE +39 +5 30 ' Yellow text
- "rivers,"
- PAUSE 100
- WINUPDATE +2 +6 30 ' Yellow text
- " canals,"
- PAUSE 100
- WINUPDATE +39 +6 30 ' Yellow text
- "reefs,"
- PAUSE 100
- WINUPDATE +2 +7 30 ' Yellow text
- " salt flats,"
- PAUSE 100
- WINUPDATE +39 +7 30 ' Yellow text
- "national boundaries,"
- PAUSE 100
- WINUPDATE +2 +8 30 ' Yellow text
- " US and Canadian state and provincial boundries."
- PAUSE 300
-
- WINOPEN 50 21 31
- "Press [Enter] to continue."
- WINUPDATE +9 +1 27
- "Enter" ' turquois text
- WAIT +14 +1
- WINCLOSE
- WINCLOSE
- '--------------------------------------------------------------------------
- WINOPEN 0 12 31
- "MAPIT contains a wealth of information"
- ""
- " and is just plain fun to use!"
- WINUPDATE +2 +1 30 ' display text in yellow
- "MAPIT"
- WINUPDATE +39 +3 27 ' turquois
- "fun"
- PAUSE 400
- WINCLOSE
- WINCLOSE
-
- WINOPEN 0 0 31
- "Continue with Shareware MAPIT installation?"
- ""
- ""
- WINUPDATE +16 +1 30 ' text in yellow
- "Shareware MAPIT"
- WINUPDATE +17 +3 27 ' magenta text
- "(Y or N)"
-
- ASK +26 +3
- WINCLOSE
- JUMP.YES LOAD_DATA
- END ' Early bailout.
-
- :LOAD_DATA
- SCRIPT ~0\INSTALL2.FIL ' Jump to 2nd half of install script.
-